home *** CD-ROM | disk | FTP | other *** search
/ Exploring Where & Why / Exploring Where & Why.iso / pc / MODULES / LESSON06 / ACT06A / common6a.cst / 00008_play again.ls < prev    next >
Encoding:
Text File  |  2003-04-30  |  333 b   |  11 lines
  1.  on mouseDown
  2.   if bounceButton(the clickon) then
  3.     --gets the index of next movie and palys it
  4.     set the itemdelimiter="."
  5.     set theMovie=item 1 of the moviename
  6.     set the itemdelimiter=","
  7.     put value(the last char of theMovie)+1 into char length(theMovie) of theMovie
  8.     go to movie the moviepath&theMovie
  9.   end if
  10. end
  11.